(xsymbol): Use the new `xname' field.

diff --git a/src/.gdbinit b/src/.gdbinit
index 233640b85176acdbd4760e05f6533e261b739b5f..5f8768a8c92e0ab63ed7ab61d489686402f1164d 100644 (file)
--- a/src/.gdbinit
+++ b/src/.gdbinit
@@ -159,7 +159,8 @@ end
 
 define xsymbol
 print (struct Lisp_Symbol *) ((((int) $) & $valmask) | gdb_data_seg_bits)
-output (char*)$->name->data
+set $xsymbol_name = ((struct Lisp_String *)(($->xname & $valmask) | gdb_data_seg_bits))
+output ($xsymbol_name->data[0])@($xsymbol_name->size_byte < 0 ? $xsymbol_name->size : $xsymbol_name->size_byte)
 echo \n
 end
 document xsymbol